
Partial Class faculty
    Inherits System.Web.UI.Page



    Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        If Not Page.IsPostBack Then
            lblIntroText.Visible = False
            If Not Request.QueryString("sc") Is Nothing Then
				lblIntroText.Visible = True
                Facultylist1.Visible = True
                Facultydetail1.Visible = False
            ElseIf Not Request.QueryString("id") Is Nothing Then
                imgFaculty.Visible = False
				Facultylist1.Visible = False
                Facultydetail1.Visible = True
                searchinner.Visible = False
            Else
                Facultylist1.Visible = True
                Facultydetail1.Visible = False
            End If

            If Not Request.QueryString("department") Is Nothing Then
                FacultyList1.DeptFilter = Request.QueryString("department")
            End If
        End If

        Dim lblSectionHeader As Label = Me.Master.FindControl("lblSectionHeader")
        lblSectionHeader.Text = "<div id='sectionheading'><p>Faculty</p></div>"

        If Not Request.QueryString("sc") Is Nothing Then
            searchinner.Visible = False
        End If
    End Sub

    Protected Sub btnFacSearch_Click(ByVal sender As Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles btnFacSearch.Click
        Facultylist1.SearchText = facText.Text
        Facultylist1.SearchFacultyName()
    End Sub
End Class
